<?php //Previsiones ?>

<center><h1>PREVISIONES</h1></center><br />
<center><h2><a href="modsociedades.php?mod=ver_sociedad&nombre=<?=$_GET['sociedad']?>"><?=$_GET['sociedad']?></a></h2></center><br />
<hr />
<center><b>Impuestos de Apalancamiento establecido por el gobierno.</b></center><br />

<?
$queda=0;

//Lectura de la tabla de impuestos para mostar valores actualizados

$consmercantil="SELECT * FROM impuestos WHERE tipoimpuesto='mercantil'";
$consong="SELECT * FROM impuestos WHERE tipoimpuesto='ong'";
$consfinanciera="SELECT * FROM impuestos WHERE tipoimpuesto='financiera'";
$consempresa="SELECT * FROM impuestos WHERE tipoimpuesto='empresa'";

$cm=mysql_query($consmercantil);
$co=mysql_query($consong);
$cf=mysql_query($consfinanciera);
$ce=mysql_query($consempresa);


$resmercantil=mysql_fetch_array($cm);
$resong=mysql_fetch_array($co);
$resfinanciera=mysql_fetch_array($cf);
$resempresa=mysql_fetch_array($ce);

// A continuación tabla de impuestos
?>

<center><table border="0" cellpadding="0" cellspacing="0" class="tabla">
	<tr><th>Tipo de cuenta</th><th>Dias Apalancamiento</th><th>Porcentaje</th></tr>
    <tr class="modo1">
    	<td>Mercantil: </td>
    	<td><?=$resmercantil['dias']?></td>
        <td><?=$resmercantil['porcoimp']?></td>
    </tr>
    <tr class="modo1">
    	<td>ONG: </td>
    	<td><?=$resong['dias']?></td>
        <td><?=$resong['porcoimp']?></td> 
    </tr>   	
    <tr class="modo1">
    	<td>Financiera: </td>
    	<td><?=$resfinanciera['dias']?></td>
        <td><?=$resfinanciera['porcoimp']?></td> 
    </tr>   	
        
</table></center>
<center><table border="0" cellpadding="0" cellspacing="0" class="tabla">
	<tr class="modo1">
    	<td>Crear empresa</td>
        <td><?=$resempresa['porcoimp']?> billetes</td>
	</tr>
</table></center><br />
<hr />
<center><b>Previsión de pago por impuesto de apalancamiento</b></center><br />

<?
	$soc="SELECT * FROM sociedades WHERE sociedad='{$_GET['sociedad']}'";
	$csoc=mysql_query($soc); 

	while ($rsoc=mysql_fetch_array($csoc)) {//Ejecutar el impuesto de apalancamiento a cada sociedad dependiendo de su tipo
	
	//Inicialización a cero de entradas y salidas por cada sociedad
	$entradas=0;
	$salidas=0;
	
	$ap="SELECT * FROM impuestos WHERE tipoimpuesto='{$rsoc['tipo']}'";
	$cap=mysql_query($ap);
	$rap=mysql_fetch_array($cap);

// Suma de entradas y salidas según los dias fijados de apalancamiento

			// calculo límite temporal
			
			$limite=$rap['dias']*86400; //Segundos de un día * número de días
			
			$hoyap=date('j F Y');
			$hoysegap=mktime($hoyap);
			
			$limitmov=$hoysegap-$limite;
			
		//Salidas

		$mov="SELECT * FROM cuentasociedad WHERE sociedad='{$rsoc['sociedad']}'";
		$cmov=mysql_query($mov);			
			
		while ($rmov=mysql_fetch_array($cmov)) {
			
			if ($rmov['fecha']>=$limitmov) { // Sumar entradas inferiores a la fecha límite
				
				$salidas=$salidas+$rmov['importe'];
			} 
		}
		
		//Entradas

		$mov2="SELECT * FROM cuentasociedad WHERE contrapartida='{$rsoc['sociedad']}'";
		$cmov2=mysql_query($mov2);			
			
		while ($rmov2=mysql_fetch_array($cmov2)) {
		
		
			if ($rmov2['fecha']>=$limitmov) { // Sumar entradas inferiores a la fecha límite
				
				$entradas=$entradas+$rmov2['importe'];

			} 
		}
		
		
	$diferencia=$entradas-$salidas;
	
	if ($diferencia>0) { //Se cobra el impuesto de apalancamiento solo si la diferencia es positiva
		
		$impuesto=round($diferencia*($rap['porcoimp']/100));
		
		$queda=round($rsoc['saldo']-$impuesto);
		

		print '<center><table border="0" cellpadding="0" cellspacing="0" class="tabla"><tr class="modo1"><td>Impuesto Apalancamiento: </td><td>'.$impuesto.'  billetes</td></tr></table></center><br />';
		
	} else { print '<center><table border="0" cellpadding="0" cellspacing="0" class="tabla"><tr class="modo1"><td>Impuesto Apalancamiento: </td><td> 0 billetes</td></tr></table></center><br />';
}

if ($rsoc['tipo']=='financiera') {

		$gest="SELECT * FROM gestionbanco WHERE banco='{$rsoc['sociedad']}'";
		$cgest=mysql_query($gest);
		$rgest=mysql_fetch_array($cgest);
		
		
		if ($queda>0) {
		
		$repcl=round($queda*($rgest['reparto']/100));
		
		$divcl=round($repcl); //Beneficios para clientes
		
		$queda=$queda-$divcl; //Beneficios para accionistas
		}
		
?>

<hr />

<center><b>Previsión de Intereses a clientes.</b></center><br />
<br />
<center><table border="0" cellpadding="0" cellspacing="0" class="tabla"><tr class="modo1"><td>Intereses para clienes: </td><td><?=$divcl?></td></tr></table></center><br />


<?
} // fin sociedad financiera

if ($rsoc['tipo']!='ong') { 

?>

<hr />
<center><b>Previsión de beneficios para accionistas</b></center><br />
<br />
<center><table border="0" cellpadding="0" cellspacing="0" class="tabla"><tr class="modo1"><td>Beneficios para accionistas: </td><td><?=$queda?> billetes</td></tr></table></center>


<?
} // Fin beneficios sociedades distintas de ong

} // fin while rsoc

?>



